
{-
Los siguientes son ejemplos para probar todas las funciones implementadas en el TP.
Algunas (como foldA23 y mapA23) no incluyen ejemplos pues son utilizadas de manera
directa por otras s'i probadas (como internos e incrementarHojas respectivamente).

internos arbolito1 = [0,1,2,3,4,5,6,7]
hojas arbolito1 = "abcdefghi"
hojas (incrementarHojas arbolito2) = [0,1,-1,5]
internos arbolito2 = [True,False,True]
take 10 (hojas arbolito3) = [1,2,3,2,3,4,3,4,5,4]
hojas (truncar 0 6 arbolito3) = [1,2,3,2,3,4,3,4,5,4,5,6,0,0,0,0,0]
evaluar (truncar 0 6 arbolito3) = 22 = (1*2-3)+(2*3-4)+(3*4-5)+(4*5-6)

Diccionarios de prueba:

dicc1::Diccionario Int String
dicc1 = definirVarias [(0,"Hola"),(-10,"Chau"),(15,"Felicidades"),(2,"etc."),(9,"a")] (vacio (<))

dicc2::Diccionario String String
dicc2 = definirVarias [("inicio","casa"),("auto","flores"),("calle","auto"),("casa","escalera"),("ropero","alfajor"),("escalera","ropero")] (vacio (<))

dicc3::Diccionario Int String
dicc3 = definirVarias [(0,"Hola"),(-10,"Chau"),(15,"Felicidades"),(2,"etc."),(9,"a")] (vacio (\x y->x `mod` 5 < y `mod` 5))

claves dicc1 = [-10,0,2,9,15]
busquedaDelTesoro "inicio" ((=='a').head) dicc2 = Just "alfajor"

-}
